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ABSTRACT 

This paper examines the problem of compiler generation rasing 
bootstrapping techniques. It summarizes the development of several 
compiler systems which were produced through bootstrapping and 
presents the methods and formalisms through which they can be 
examined. The discussion of these techniques is illustrated with the 
development of an XPL compiler system for tire Control Data 6500 



computer. 
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I. INTRODUCTION 



The purpose of this thesis is best expressed as an attempt to 
examine the power and uses of the bootstrapping technique as applied 
to compiler generation. This investigation was conducted through the 
implementation of an XPL compiler for the Control Data 65 00 computer. 

At the outset of this project two plausible definitions of bootstrapping 
were made. "Evolutionary bootstrapping" was defined as the general 
process of building a larger system upon a subset of itself. As applied 
to compiler generation "bootstrapping" was defined as the process of 
moving a language or software system from one computer to another 

through the assistance of the original system. 

In the process of implementing the XPL programming language 
upon the Control Data 6500 computer (tire XPL-6500 project) both 
forms of bootstrapping were employed to first build the initial XPL. 

6500 nucleus and then to transfer it to the target computer, the CDC 



6500. 

This paper will first introduce tire problem and systems used rn 
the XPL-6500 project, and then discuss the various aspects of boot- 
strapping used to develop and implement the XPL-6500 compiler 

system. 
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II. XPL AND THE GDC 6500 



The selection of XPL as the target language and the CDC 6500 as 
the target machine determined most of the problems to be resolved 
during the development of the XPL-6500 system. A brief discussion 
of XPL, the CDC 6500, and the reasons for their selection is provided 
to add insight to the problems and solutions found during the designing 
and implementation of XPL-6500. 

A. WHY XPL? 

XPL, the dialect of PL/I [Ref. 5] developed at Stanford University, 
was chosen for this implementation for several reasons. A primary 
consideration was that XPL is of sufficient complexity to require for 
its implementation a close examination of a wide spectrum of strategies 
and techniques which had been succes s fully used by other compiler 
systems. Also, XPL is a language which was specifically written for 
the development of compiler systems, suggesting that it would be pos- 
sible to write this compiler in its own language. This would enable the 
compiler writer to take advantage of the existing XPL system on the 
IBM 360/67 for compiler development, as well as for the technique of 
evolutionary bootstrapping. 
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B. CHARACTERISTICS OF THE IBM 360/67 and the CDC 6500 



The Control Data 6500 was chosen as the target machine for the 
new XPL system. Differences in organization between the CDC 6500 
and the IBM 360/67 provided an opportunity to examine the bootstrapping 
process in a more general light. ^ The IBM 360/67 and the CDC 6500 
are third generation computers capable of "providing extremely fast 
solutions to data processing, scientific, and control center problems, 
as well as multiprocessing, time- sharing, and management information 
applications. " [Ref. 6, l] 

The 6500 consists of a system of eleven independent sub -computers, 
ten of which were designed specifically for peripheral and operating 
system interaction. The system 360 is normally configured as a single 
high speed central processing unit assisted by various channel and peri- 
pheral controllers. Information stored within the 360 system is address 
able by the 32 bit word, the half-word, or the byte, which is 8 bits in 
size. The 6500 is addressable only to its 60 bit word, and is built upon 
a byte size of 6 bits. Due to this difference in addressability XPL 
operations involving character, or byte manipulations were found to be 
more difficult to implement on the CDC 6500 than on the 360/67. 

Both the addressing of core and back-up storage locations in the 
IBM 360/67 are built upon the concepts of fixed blocks of storage. This 
system reqriires that all addressing be done relative to several registers 

Although the CDC 6500 was used for this implementation it is 
understood that the discussion applies to any of the 6000 series machines 
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which must be maintained by the user's program. The 6500 system 
also uses a method of relative addressing, but it is hidden from the 
user, who considers his addressing to be absolute. This difference 
significantly eases the implementational problems of the XPL system 
on the 6500 over that already existing on the 360/67 version. 

In addition to these differences, the actual CDC 6500 system used 
at the Nava] Fleet Numerical Weather Center is eqxiipped with a one 
million word extended core storage (ECS) capability which proved very 
useful in the implementation of the first XPL system. The solutions to 
these organizational and operational differences will be discussed further 
as the actual implementation of the system is described. 

C. THE XPL LANGUAGE AND COMPILER SYSTEM 

The original IBM 360 version of XPL [Ref. 7] was developed 
basically to provide a method through which a good student language 
compiler could be written for the computer science students attending 
Stanford University. This original goal grew in size and scope until 
the present XPL compiler generation system developed. 

The present system and language are tailored to permit the im- 
plementation of a bottom-up parsing algorithm sufficiently extended 
to provide table driven syntax analysis of any (2, 1) bounded context 
grammar. The table development and syntax analysis needed by this 
algorithm are provided by ANALYZER, one of the four major programs 
of XPL compiler generation system. The analysis tables, once 
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produced, are used to drive the parsing algorithm included within 
SKELETON, the prototype compiler for the XPL system. 

A basic requirement for the XPL language was that it contain all 
constructions necessary to implement SKELETON and ANALYZER. 

In this way the structure of these programs determined the basic 
differences of the XPL language from full PL/I. 

The last two programs of this compiler system are XCOM, the 
XPL to machine language translator, and its submonitor, XPLSM. 

The submonitor, although written in assembler language, also affected 
the development of the XPL language. Its effect was indirect as the 
demands upon the language by XCOM could be changed by either in- 
cluding more or less of the compiler's operation within the monitor 
itself. The aspects of the monitor-translator interaction will be dis- 
cussed again as the goals and requirements for the CDC 6500 equivalents 
of XCOM and XPLSM are developed. 

To limit both the size and time required to develop this student 
language compiler, as well as improve its speed and efficiency over 
PL/I, only three types of variables are allowed, Fixed, Character 
(of variable length),' and Bit. Again, to improve efficiency, XCOM 
was designed as a single pass compiler, thus requiring within the 
language that all variables be declared before being used. To facilitate 
the implementation of the language, the CASE statement was added to 
the PL/I subset. These are but a few of the many differences between 
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XPL and PL/I, which are documented in detail elsewhere [Ref. 8]. 

The BNF representation of XPL-6500 is also included in Appendix A. 

It should be noted that the XPL-6500 language was. developed using 
a 48 character set vocabulary (with composite symbols) which differs 
from the IBM 360 version of XPL implemented in a 60 character set 
vocabulary. The reasons behind this seemingly trivial alteration 
introduce the basic problem of finding a common vocabulary between 
the two systems being bootstrapped. 
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III. CHARACTER SETS: ESTABLISHING A COMMON VOCABULARY 



The brief discussion of the general features of the IBM 360 and the 
CDC 6500 should indicate that the possibility of a direct linkage between 
the two systems would be relatively small. It was, in fact, non-existent, 
due mainly to the differences in "byte" sizes which then requires that 
any communication between the two machines be done through some 
mutually acceptable intermediary character set. 

A. DEVELOPING THE INTERMEDIATE CHARACTER SET 

Although the character sets for the IBM 360 and the CDC 6500 are 
about the same size, Table I shows that there are many conflicts 
between them. In order to minimize these conflicts, the size of the 
XPL character set was reduced from its present size of 60 characters 
to 48. Any subset properly chosen and devised would probably have 
proved sufficient, but in order to allow this version of the XPL language 
to be used on other Control Data systems smaller than the 6500, the 
standard PL/I 48 character set [Ref. 5] with composite symbols was 
selected. This 48 character set was chosen since it was both large 
enough to completely express the XPL language without drastically 
altering its syntatic structure, and yet small enough to reduce virtually 
all of the conflicts found between the larger character sets. 

This use of a common character set which is smaller than that 
which expressed the language originally, requires the development of 
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a translation algorithm which maps the original set into this new 
smaller character set. The algorithm must not introduce any changes 
into the syntatic or semantic meaning of the original text. For a 
language such as XPL, there are fortu.na.tely few instances where the 
translated code would lose its semantic integrity through stich a trans- 
lation and yet retain the proper syntatic structure. These errors, which 
would not be detected by a parsing algorithm based entirely on the syntax 
of a language, must obviously be guarded against as their introduction 
would render the translated code unworkable and useless by filling it 
with semantic "bugs. " 



B. ELIMINATING SEMANTIC ERRORS 

Two methods were employed to limit the possibilities of ^mantle 
errors due to this translation. First the reliance upon semantics 
hidden within the language was reduced by expanding the syntatic 
structure of the language. This expanded structure insures that it 
would then be more likely that improper syntatic constructs would occur 
as the result of any improper semantic interpretation during the trans- 
lation process. These semantic errors would be detected as syntatic 
errors upon parsing of the translated text. 

The second method used, was to include within the translating 
algorithm the ability to detect and denote semantic cases where blind 
translation of the original text would definitely produce semantic errors. 



An example of this type of error in XPL could occur if a single character 
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within a character string it blindly mapped into a 48 character ser 
equivalent, which is larger in length than the original, character (e. g. , 
the mapping of the into ", . "). 

It is obvious that any translation of the original text which alters 
the original semantic meaning destroys the function for which the 
original text was designed. Figure 1 illustrates the simple algorithm 
used to accomplish this translation. To insure that the algorithm did 
not introduce any syntatic errors into the translated text, SKELETON, 
equipped with a 48 character set of the XPL language, verified by a 
syntax check that the mapped text remained syntatically error free. 

A test of the semantic integrity of the algorithm would not be possible 
until a working version of the XCOM compiler was implemented on the 
CDC 6500. 

C. CODING AND FORMAT 

Two basic characteristics of this intermediate vocabulary, coding 
and format, had to be acceptable to both machines. Fortunately, with 
the selection of the 48 character set as the intermediate vocabulary, 
the format and coding were easily selected. 

Although not optimally efficient, the card image was chosen for 
the format to be used since both systems could readily accept it as a 
form of input, either from tape or from actual punched cards. Both 
methods were used in the actual implementation of the XPL system 
on the CDC 6500. 
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Figure is Character Set Translation 

Algorithm 
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The Hollerith code was chosen over the other available character 
encodings (specifically binary core image, or internal display code) as 
it came closest to resolving the encoding and decoding conflicts between 
the two machines. It became quite clear at this stage that if the trans- 
lation into 48 character intermediate vocabulary had not been made, 
the conflicts between the character encodings required by the two 



machines ccnild not have been res 



olved without a great deal of effort. 



With this translation capability it then became possible to "map" 
any XPL program written for the version of XPL implemented on the 
IBM 360 into common vocabulary which could then be bootstrapped 
onto the CDC 6500. Figure 2 summarizes the implementation used 
to bootstrap useful XPL programs from the IBM 360 onto the CDC 
6500, as well as introduce a formalism, the "T-diagram. " which was 
found useful in both developing and expressing involved bootstrapping 



op or at ions . 
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Figure 2: 36 O TO 6500 BOOTSTRAPPING OPERATION 



IV. THE T- DIAGRAM 



The "T-Diagram" is but one of several formalisms introduced by- 
Earley [Ref. 3] to assist in both describing the actions of processors 
for programming languages, and in the testing of any given set of 
translators and interpreters for the ability to bootstrap, or build upon 
themselves . 

Earley's notation defines three basic; classes of actions that can be 

1 

performed by language processors. Figure 3A represents a program 
written in a specific language "LI" to perform a given task "f. " In 
Figure 313, the T-diagram denotes a translator written in language 
"LI" to translate "L2" into language "L3. " Finally, Figure 3C 
illustrates an interpreter for the language "L2" which is written in the 



NAME 

L2 > L3 

Ll 

B 

LANGUAGE PROCESSOR FORMALISMS 



L2 

Ll 

C 



language "Ll . " 




Figure 3: 



Figure 3 was taken from Reference 3, page 607. 
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Earley also presented several theorems and algorithms through 
which it can be determined if any given set of translators, programs, 
and interpreters will be able to produce a given program in a given 
target language. His basic premise is twofold: 

1. a given set of translators, programs or interpreters 

/ 

could directly produce a given program in a given 
target language if and only if 

a. the program already exists within the present 
system in some language " L2 " and an inter- 
preter for language "L2" written in the target 
language is present, or 

b. the program is contained within the present set 
along with a compiler which will translate the 
program into the target language. 

2. in order to cover multiple productions, he states that a given 
set can produce (i. e. , through transitive completion) a given 
program in a target language if and only if there exists a 
sequence of prodxictions , allowed by the first premise, 
which eventually leads to it. 

These concepts proved to be useful not in the actual implementation 
of the XPL system on the 6500, but rather by providing more basic 
insight into the many methods which were available. Of the three 
formalisms defined for program, translator, and interpreter, only the 
"T-diagram" will be extensively used to describe the implementation 
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necessary to develop the XPL system for the CDC 6500. Note that this 
translator formalism consists of three parts. The upper section of the 
T-diagram applies an over-all name to the actual translation process 
described across its center. Although neither the name nor translation 
process change during the bootstrapping operation the third part of the 
diagram which describes the method used to implement this translation 
does change. 
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V. OTHER COMPILER IMPLEMENTATIONS 



Now that a common vocabulary existed between the two machines, 
the development of an XPL compiler for the CDC 6500 through the use 
and assistance of the IBM 360 version was considered feasible. If it 
had been determined that a common vocabulary either could not have 
been created, or die] not justify its attainment through sufficient gains 
from the XPL system, then bootstrapping of the IBM 360 version would 
not have been practical. The system, by necessity, would then have to 
have been developed using the software currently available on the CDC 
6500. At this point it was found useful to examine the development of 
several compiler systems. Specifically, the development of the NELIAC 
Machine Independent Compiler System and the XPL implementation fer 
the IBM 360 were found to be excellent examples of systems which were 
initially bootstrapped into existence. 

A. THE NELIAC COMPILER SYSTEM 

NELIAC, or Navy Electronics Laboratory International Algol 
Compiler, was developed concurrently with the development of the 
Algorithmic Language Algol 58 [Ref. 4]. Its development provides 
an example of the evolutionary bootstrapping technique. 

The first Neliac compiler was developed for the Univac M460 
computer through a bootstrapping procedure accomplished entirely 
within the M460 machine. This differs from the development of the 



IBM and CDC version of XPL as they both used other machines and 
compilers to assist in the compiler implementation. The Ncliac system 
started with a handwritten nucleus which was about twenty percent of 
the final compiler size. This nucleus could translate a small subset 
of this Algol-like language into executable code, and was used to com- 
pile newer versions which extended the scope of the original compiler. 
The Neliac-C compiler then developed, or evolved, by building upon 
previous editions of itself (i. e. , evolutionary bootstrapping). 

The Neliac system, once implemented through the Neliac-C com- 
piler on the M460 computer, was used to bootstrap the Ncliac system 
to other computers, specifically the CDC 1604, Burroughs 220, and 
the IBM 704. In some instances it was necessary, in order to implement 
an efficient version of the Neliac system, to perform a two step boot- 
strapping process. The first step would bootstrap an inefficient, but 
workable system from the old to the new computer. The second step, 
through the use of evolutionary bootstrapping would produce an efficient 
final system which was completely divorced from the original computer. 

The two step bootstrapping process used in the Neliac development 
is exemplified in their CDC 1604 implementation. In this case the 
first compiler was written as an inefficient compiler to translate the 
Neliac into the appropriate machine language. This first step was 
implemented in Neliac-C on the M460 computer. This inefficient 
compiler was then used to recompile an improved version of itself 
on its target machine (in this case the 1604). In order to illustrate 
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this process T-diagrams are used with the following abbreviations: 

40 6 The Univac M460. 

1604 The Control Data 1604 computer. 

704, 709 The IBM 704 and 709 computers. 

AL Assembly language (symbolic) 

ML Machine language (binary) 

EX Execution 

Figure 4 illustrates the multi-step development of the original Neliac-C 
compiler on the M460 Computer. Figure 5 describes the process used 
to bootstrap the Neliac system from the M.460 to the CDC 1604 (a two 
step process), and finally Figure 6 shows the single step operation 
needed to bootstrap the Neliac system between two similar machines 
such as the IBM 704 and 709. 

B. XPL-360/67 COMPILER SYSTEM 

As previously stated, the XPL system for the IBM 360 was 
developed through the assistance of another machine, the Burroughs 
B5500. Although the procedure used to implement the system was 
complex and not as direct as the bootstrapping used for the Neliac 
system, the amount of work expended to produce the first XPL compiler 
was probably far less than that spent by the Neliac originators. The 
developers of the XPL system chose to write two versions of their 
XPL to 360 machine language translator (XCOM), but to write them 
both in higher level languages [Ref. 7], They chose to use Algol as 
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Figure 4: Evolution of First NELIAC 
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NELIAC-709 I j iNELIAC-709 

NELIAC_-^ 709 I | NELIA C . ^ 709 
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igure 6: Single Step Development 

of NELIAC-709 



implemented on the B5500 computer for their first compiler. This 
compiler, which could execute the B5500, was used to compile the 
second version of XCOM which was written in XPL. The product of 
this second translation was a machine language version of XCOM for 
the IBM 360 computer, which would compile future additions of the 
original XCOM compiler. Using a system of abbreviations analogous 
to those used to describe the Neliac development, Figure 7 illustrates 
the development of the XPL system for the IBM 360 computer. 



Figure 7 was taken from the inside front cover of Reference 7. 
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Figure 7 s Evolution of XPL-36O/67 
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VI. GOALS FOR THE FIF.ST COMPILER 



The examples of compiler implementation for the Neliac and 
XPL-360 systems previously discussed were presented mainly to 
introduce the several ways in which bootstrapping could be used to 
assist the compiler writer in developing his system. The bootstrapping 
used by these compilers illustrate but one of the many tools and methods 
available which would be fundamental in determining the goals and basic 
developmental approach taken by the compiler writer. 

A. RESOLVING CONFLICTING COALS 

Of the many general constraints encountered in the design of a 
compiler system, virtually all could be directly or indirectly related 
to several conflicting goals. 

1. The time allowed for compiler development. 

2. The efficiency of the resulting code. 

3. The degree of compiler efficiency in execution. 

To complicate matters further, the measure of "efficiency" used 
above is again related to the optimal use of several conflicting re- 
sources, among the most important being: 

1. execution speed, and 

2. the main memory used by the compiler. 

Several more goals are added to those above by the fact that this 
compiler must bridge the differences between two machines. In 
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particular, there is need for sufficient generality to prevent rejection 
of the compiler on the new system. This rejection could come about 
in several ways, stich as: 

1. The use of functions and algorithms which are dependent 
upon the original machine (e. g. , the XPL BYTE function, 
or "bit strings"), or 

2. The dependence upon algorithms which exceed the limitations 
of the new machine (e. r. main memory requirements). 

B. GOATS FOR COMPILER GENERALITY 

This need for generality overshadows the goal of optimal efficiency 
on the first bootstrapping iteration. If the two computers can be suc- 
cessfully bridged with a workable version of the language being boot- 
strapped (in this case XPL), evolutionary bootstrapping steps on the 
new computer would then be oriented towards achieving this second 
goal of compiler efficiency. Stemming from this need for generality 
the goals for the first compiler eventually took the following form. 

1. To use assembler as the target language, since it is 
flexible enough to efficiently implement any XPL con- 
struct and of sufficient generality to provide protection 
against the first type of rejection, (i. e. reliance upon 
machine dependent operations). 

2. To develop algorithms for the construction of emitted 
code of sufficient independence and simplicity to allow 
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their alteration, if it is later found that their use 



would cause either type of rejection. 

3. To minimize the use of compile-time or execution- 
time optimization as complex algorithms would be 
required for their implementation. Obviously, some 
optimization was required by the second restriction, 
i. e. , that of exceeding the limitations of the new 
machine. The implementation of the XPL system 
on the CDC 6500 did require the use of several 
simple optimization algorithms designed specifically 
to reduce the amount of emitted code and core re- 
quired for the compiled program. Such concessions 
to obtain a feasible implementation are further dis- 
cussed in Chapter VII. 

C. THREE PHASES OF DEVELOPMENT 

Many subgoals were determined in order to implement the general 
goals specified for the first compiler. The subgoals tended to divide 
the development of the XPL-6500 compiler into three main evolutionary 
bootstrapping steps. The subgoals for each of the three steps which 
eventually produced the first XPL compiler for the CDC 6500 were: 
XCOM-1: develop a translator of sufficient complexity to 

parse any XPL program and emit syntatically 
correct COMPASS assembler statements for all 
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XPL constructs which required direct code 
emission to be efficiently implemented. 

XCOM- 2 : build a compiler using XCOM- 1 and a set of library 

procedures sufficient to implement all fixed numeric 
functions allowable in the XPL language (e. g. BYTE) 
or implicitly needed to implement XPL (e. g. "bit 
strings "). 

XCOM- 3: construct a machine independent compiler, written 

in XPL for the IBM 360/67 and consisting of the 
previously developed XCOM 2 and a library of sub- 
routines which would implement all string operations 
and functions (including input and output of sequential 
and random files) allowable in the XPL source language 

D. GOALS FOR XCOM 1 

Several factors determined the definition of XCOM— 1, the first 
step in the bootstrapping operation. The definition required XCOM— 1 
to parse an entire XPL program, but not to emit all of the code nec- 
essary for its execution. The reasons for these restrictions were 
simple, and illustrate the power of the evolutionary bootstrapping 
technique. As XCOM-1 was built upon SKELETON, it inherited the 
parsing algorithms used by the XPL system. Both this algorithm and 
the code emission routines as developed for XCOM-1 required the use 
of many XPL functions which would have been very difficult to 
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completely implement at this level. Through the use of evolutionary 
bootstrapping these difficult functions were easily implemented at 
higher, or later bootstrapping steps. This method was illustrated 
previously when the history of the Neliac system for the M460 computer 
was discussed. The objective in that case for the initial step was to 
obtain a nucleus which was as small as possible or required the least 
amount of machine level coding, to still be able to compile a workable 
subset of the total Neliac language. It is this subset through which the 
next bootstrapping steps could expand the translative abilities of the 
initial nucleus compiler. The subset of the 48 character XPL language 
determined sufficient for XCOM-1 required that the following types of 
statements be implemented by XCOM-1: 

1. all storage allocation for numeric and string variables, 

2. all fixed numeric and Boolean operations, 

3. All branching and conditional statements, 

4. procedure definitions and calls, and 

5. special calls used internally by the future bootstrapping 
iterations . 

Now that the goals for each step within the bootstrapping process 
for the XPL-6500 compiler have been discussed it should be clear that 
they would not yield the optimum compiler. Many of the goals and 
restrictions determined important for this compiler, such as generality 
and flexibility, would not retain the same weight once the gap between 
the two computers had been breached. The re-evaluation of these goals 
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and the effects of new restrictions would determine a different set 
of priorities, such as optimal use of time and storage, and would 
guide the compiler writer in the development of the next compiler. A 
similar need exists for a two or three step bootstrapping process in 
order to implement an efficient version of XPL-6500, as it did during 
the bootstrapping of the XPL system from the Burroughs B5500 computer 
to the IBM 3 60. Given this background and these specific goals for the 
first compiler, its implementation can now be discussed. 
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from the monitor. Interaction with the operating system for input, 
output, file maintenance , and error recovery procedures for the 
executing XPL program were found to be most efficiently implemented 
through monitor calls. This is not to imply that only operating system 
interaction (the "normal" monitor function) could be directed by the 
monitor, since any compiler operation could take advantage of the 
optimized coding within the monitor to maximize their execution speed. 
The actual monitor developed for use in the XPL 6500 system is dis- 
cussed in Section C of Chapter VII. 

2. Library Procedures 

Library procedures which were originally written in the XPL. 
48 character set language and compiled by XCOM 1 prior to compilation 
of the user's program, can be used for tasks which are complex and 
yet infrequently called. Thus, the advantages of writing in a higher 
level language would not be offset by the inefficiencies of compiler 
emitted code. Aside from the obvious flexibility provided through the 
use of library procedures, there is a second advantage to their \ise 
with the XPL language. It was found that the initial compiler, XCOM 1 
could be greatly simplified through the rise of library procedures. This 
was due to the fact that the same algorithms which processed user 
defined procedures could be used to call library procedures which 
would implement almost all of the string functions and the operations 
needed by the complete XPL language. This is another example of 
where the power of the bootstrapping technique significantly rediiced 
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and simplified the problems to be faced at the machine code or assembly 
code emission level. Figure 8 illustrates the hierarchy and structure 
of the libraries developed for the XCOM - ?. and 3 bootstrapping steps. 
These library procedures are listed in Appendix C. 

3. Compiler Generated Procedures 

Compiler generated procedures were used in the XPL-6500 
implementation for simple tasks used with a frequency which would 
make the necessary monitor linking inefficient. Similarly, these pro- 
cedures were used for tasks which required special code emission in 
order to be implemented. In the case of the XPL-6500 implementation 
it was determined that only four of the library procedures (SIIL, SHIi, 
PUTWORD, and GETWORD) were required to be emitted from within 
XCOM-l. The entire library structure could then be implemented 
through XCOM-l and these four built-in procedures. 

The compiler generated procedures were separated into two classes. 
They were considered as either tasks emitted as separate and complete 
procedures, or as tasks which are integrated within the general code 
emission algorithm. The first type was chosen to implement the four 
procedures previously mentioned. Although this approach provided 
the simplicity and generality desired it was also extremely inefficient, 
and should be one of the first areas altered in future bootstrapping steps 
on the CDC 6500. 

Although it is not the purpose of this paper to discuss in detail the 
implementation of the XPL language on the CDC 6500, some detail is 
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provided to illustrate how the concepts presented in previous sections 
were employed. This discxission would also highlight the implementa- 
tional differences between the XPL-6500 and its parent system on the 
IBM 360 as well as provide an understanding of what the next boot- 
strapping iteration should include. 

B. IMPLEMENTATION OFXCOM-1: 

To achieve the desired goals of simplicity and generality for the 
first compiler, the code generation algorithms developed for XCOM l 
differed radically from those used by the parent XPL 360/67 system. 
This was to be expected considering the different purposes between 
the optimized XPL -360 compiler and a compiler designed to bridge two 
c c 'oc* 3 . s n li e 1 } s i. c ■»* l o vi s ^ o < > q r ^ 0 t s s i o 

code from the XCOM-1 was to emit code at the earliest time allowable 
by the syntatic structure. This approach would obviously not allow for 
the type of optimization achieved in the compiler developed for the IBM 
360, where code was emitted at the last possible step. The approach 
did, however, permit the development of a simple, straightforward 
compiler which could be altered with a minimum of effort and confusion. 
Three of the major sections of XCOM-1 are now considered. 

1. Code Production and Optimization 

The XPL system minimized the difficulties of code emission 
by designing the parsing algorithm in SKELETON so that it would call 
upon SYNTHESIZE to emit code for each syntatic production found in 
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CONSTANT was designed for this purpose. Aside from this type of 
constant propagation, constants were also emitted within a central 
processor command whenever possible. This eliminated the load 
operation which would otherwise be required. 

The effect of the constant propagation algorithm on the volume of 
unnecessary code was negligible and a more fundamental change was 
needed. The original algorithm required that all values passing through 
the syntatic equations leading to <^primar^> be protected by first 
creating a new storage location and then storing the value in it. This 
algorithm was simple and effectively protected all variable and constant 
locations from being inadvertently destroyed. Through this device 
future productions did not have to consider variable protection in their 
algorithms . 

Unfortunately, an examination of the emitted code showed that the 
majority of values passing through this production did not require this 
protection. Needless storage locations as well as load and store 
operations were being created. To solve this problem the algorithms 
for all productions which could possibly destroy the contents of a 
variable, or constant location were changed. These productions would 
now determine if the value being altered was the ORIGINAL, or 
SCRATCH value. If an ORIGINAL value were found, procedure 
PROTECT would be called to create a new location. Although simple 
optixmzation algorithms were already being used (e. g. the reuse of 
storage locations in arithmetic parsing steps) the effect that this single 
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global change had on the "quality" of the emitted code was dramatic. 
From this single case it can be seen that the leverage obtained by waiting 
as long as possible before emitting code is enormous and well worth the 
effort. 

2. Co de Emission 

To emit a COMPASS assembler statement XCOM 1 would 
produce what was essentially a machine language statement and pass it 
to a group of procedures which would then construct, format, and emit 
a COMPASS assembler statement. The production of an assembler 
statement from a machine language statement, clearly a step backwards, 
was designed to permit the compiler to bypass the assembly step com- 
pletely at some future bootstrapping step. Again, the assembly step 
was needed for this compiler to act as an intermediary so that machine 
differences (especially word size) could be resolved. A future altera- 
tion to XCOM 1 would then be to include all the functions of the assembly 
step, such as resolution of all symbolic addresses (i. e. , backstuffing 
addresses), and production of the object module within the compiler 
proper. The basic structure of the code emitting routines used to 
produce the COMPASS assembler statements is illustrated in Figure 10. 

3. The Symbol Table 

To implement the first bootstrapping step only a primitive 
symbol table was needed. For each symbolic reference used in the 
XPL program text, a symbol table entry consisting of the following 
parameters was made: 
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1. STYID, which contained the symbolic name of this 
variable, 

2. STYLOC, which contained the label name (or location) 
of the first word allocated to this symbol, 

3. SYTTYPE, contained an integer from 0 to 9 representing 
the type of symbol located at SYTLOC. Table II describes 
the symbol types \ised to implement the XCOM-1 symbol 
table algorithms, 

4. PRAMCNT, indicated the number of parameters declared 
for this symbol, 

5. REFER, which counted the total references made to 
this symbol table, and 

6. DECLARED ON LINE, which contained a card reference 
for diagnostic purposes. 

Figure 11 illustrates the basic structures needed to provide normal 
symbol table functions for the XCOM-1 compiler. The XPL language, 
since it allows for the declaration of local variables and nested pro- 
cedures, produces additional requirements for the symbol table 
procedures. In order to protect these locally declared variables and 
procedures, it was necessary to add several constructs (PROC MARK, 
and LAST PRAM) to the symbol table algorithm illustrated in Figure 11. 
The effects that these extra restrictions had upon the over-all symbol 
table algorithm are detailed in Figure 12. An amply annotated listing 
of XCOM-] is provided in Appendix E. To assist in any further work 
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on the XCOM-1 compiler, a listing o£ its major procedures and their 

functions is provided in Table III. 

Many routines were not included within Table III as these pro- 
cedures originated with SKELETON, the XPL proto-type compiler, 
and are thoroughly described elsewhere [Ref. 7]. Figure 13 illustrate^ 
the relations among the major procedures present in SKELETON down 
to tire point where they interface with SYNTHESIZE. 

The XPL compiler developed for the IBM 360 worked through a 
submonitor for the sake of efficient system interaction. A submonitor 
was also employed in the implementation of the XPL 6500 system. It 
is discussed here to introduce some of the problems faced by a compiler 
writer when interacting with an operating system. 

C. A MONITOR FOR THE FIRST COMPILER 

The monitor's primary function, as previously mentioned, was to 
simplify the compiler's interaction with the operating system. In the 
case of the CDC 6500 this operating system was SCOPE 3. A brief 
discussion of the SCOPE 3 operating system is now presented to provide 
some insight into the problems encountered while developing the monitor 

for the XPL-6500 system. 

SCOPE 3 is a file oriented operating system which is resident 
within one of the ten peripheral processors of the CDC 6500. Com- 
munication from the executing program to this operating system can 
be achieved through the use of any other peripheral processor (PP) 



1 Figure 13 taken from Reference 7. 
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acting as an intermediary. The monitor for XPL, which is unconcerned 
as to which peripheral processor is supervising its execution, creates 
calls to SCOPE 3 in two steps. In the specific case of input, output, 
and file interaction, the monitor must first construct or update a 
"File Environment Table" (the FET) with information relative to that 
call. At a minimum, this updating usually consists of resetting the 
"Working Storage Address" (WSA) by the "First Word Address" (FWA), 
the actual core location of the variable(s) involved. The FET is then used 
as a reference in a two word call placed in a specific location within the 
monitor which is examined by the PP. All system calls issued by the 
XPL monitor also employed the "Recall" option which essentially would 
force the program out of execution (via the CDC Exchange Jump process) 
until the call had been completed. This feature was used as it signif- 
icantly ‘improved the CPU utilization. 

Once the program was restarted after the system call, the next 
main Monitor function was to examine the FET for indications of error, 
and if found, to take action upon them. As the Monitor is presently 
implemented, this action consists of causing the program to terminate 
(as in the XPL 360 submonitor). When termination occurred, a descrip- 
tive "Completion Code" was passed to SCOPE 3 to be issued and to 
indicate where in the Monitor the error was found. Error recovery 
procedures were not implemented for this first Monitor since the XPL 
6500 system had not developed to the point where the actions necessary 
for useful error recovery had been determined. In summary, for each 
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Monitor -S COPE 3 interaction involving I/O there were basically three 
functions to be performed by the Monitor. 

1. Update the File Environment Table 

2. Call the SCOPE 3 operating system 

3. Examine the FET for indications of error. 

Since there were two systems using the Monitor as an interface, 
SCOPE 3 and the executing program, there were two logical program 
flows through the Monitor, as indicated in Figure 14. Upon first being 
called by SCOPE 3, the basic assumption was that all sequential input 
and output files would be used, so they were then created and opened 
(random files were created dynamically). The Monitor woiild then call 
"PROGRAM" into execution (the XPE 6500 Compiler always labeled its 
final code file as "PROGRAM"), and wait for either the program to 
terminate, or for a call to "MONITOR. " MONITOR was designed to 
handle eight cal)s, all involving file interaction. Table IV summarizes 
the MONITOR calls and their actions. 

The monitor, written in COMPASS assembler, was constructed as 
a large case statement to provide flexibility for alteration and develop- 
ment. Many convenience calls, such as date and time, were not im- 
plemented in this version of the monitor since they were not essential 
for the first compiler's operation. The development of a monitor which 
includes these calls should be considered during the next bootstrapping 
step of XCOM. The internal logic of the monitor is provided in Appendix 
B. This appendix provides a base of complete documentation for future 
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or substring defined by this descriptor would then be operated upon. 

Thus the only storage statically fixed during execution would be the 
actual string descriptor array. 

This string descriptor array would cilso give, at any given moment 
during execution, an accurate picture of all active locations in the 
string area. Thus a program (the XPL-360/67 COMPACT1FY) could 
examine this descriptor array and compact the active storage without 
altering the pointers and other links between variable names and the 
actual character strings. 

The problems which result from the use of this type of algorithm 
are twofold. First the compiler would have to build all the necessary 
structures and links between symbolic names and descriptor locations. 

In addition the compiler would have to store the extra information needed 
to execute the dynamic string algorithm. This would be a compile time 
problem. During program execution any character string operation 
would have to work through this table of descriptors. This would also 
force all submonitor -program interaction for sequential input and output 
to operate through this table. 

It was determined after a significant effort towards implementing 
a dynamic string algorithm for the XPL-6500 system, that the benefits 
gained through such an algorithm were not worth their attainment. A 
much simpler and efficient algorithm for static character string storage 
allocation was developed for the XPL-6500 system. This static algorithm 
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was further simplified through the use of two previously mentioned 
methods; bootstrapping and library proced\ires. 

2. Use of Bootstrapping and Library Procedures 

The implementation of a static string allocation algorithm for 
the XPL-6500 system was achieved and greatly simplified through the 
use of library procedures and bootstrapping techniques. Although 
simpler in design than the dynamic algorithm discussed, the static 
allocation algorithm developed for the first step, if implemented within 
XCOM 1, would have required a higher degree of complexity and 
rigidity than could be tolerated. Library procedures were used to 
perform all string operations which did not demand direct code emis-. 
sion for their implementation. These procedures provided an algorithm 
which achieved the flexibility. Simplicity, and clarity that was deter- 
mined necessary for the first compiler. 

The technique of evolutionary bootstrapping was also used to 
further simplify the implementation of the static string allocation 
algorithm. This technique allowed XCOM'l to develop as a separate 
compiler for all fixed numeric statements without being altered signif- 
icantly as the string algorithm developed. As discussed in Chapter VI, 
XCOM 1 was used to compile itself as a first step. Library procedures 
were then used to produce a compiler capable of all XPL string operations 
and functions. 

' \ 
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3. String Variable Structures and Operations 



Although the algorithms used to implement the string variables 
in the XPL 360/67 and XPL-6500 systems differed radically, their 
basic structures did not. The static string allocation algorithm developed 
for XPL-6500 was designed to act as an interface between XCOM-1 and 
a one million word Extended Core Storage (ECS) capability available to 
the CDC 6500 computer. Several factors required that this ECS capa- 
bility be used, the primary being the size of the static string array. 

The XPL language allows variable length strings to have a 
maximum size of 256 characters. It was determined that to compile 
just the string variables of XCOM— 1, assigning fixed blocks of 256 (10 
characters per 60 bit word) for each string variable, more central 
memory storage would be required than was available on the CDC 6500 
( 13 IK words ). 

Two avenues were then available to solve this problem. First, 
all the programs written for the XPL 360/67 implementation could be 
rewritten for a fixed string length algorithm, or the ECS capability 
could be used. The fixed string length approach was determined the 
best, but would require rewriting all the XPL-360 programs \ised in 
the bootstrapping effort. In order to avoid this, the ECS approach was 
taken. 

These blocks of ECS were referenced indirectly through 
descriptors similar to those used by XPL 360/67. Descriptors were 
used to include string length information which would be needed by 
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most string operations. Aside from the string length, these descriptors 
contained the first word location in ECS of the desired fixed string 
block. To perform any string operation a monitor call was issued to 
load in a specific string block. Upon completion of the operation, the 
resulting string could be stored in ECS through another monitor call. 
This arrangement provided a simple and efficient system for storing 
and retrieving strings. The efficiency was gained from the time saved 
moving character strings, as the ECS device could transfer blocks of 
core storage (larger than 25 words) at a faster rate than central mem- 
ory. This procedure would implement half of the string variable prob- 
lem. The implementation of constant character strings, declared at 
compile time, required separate development. 

To initialize the ECS fixed string blocks with the constant 
character strings found during compilation, a second descriptor type 
was needed. As the constant strings were encountered in the program 
text, code was emitted to store them in the variable data area. At 
this time a descriptor (ECSLOAD) was produced which contained the 
location in the data area of the string (a label name), the length of the 
string, and the ECS block that the string should be stored in before 
execution. At the end of compilation, all these ECSLOAD descriptors 
were placed in the variable data area, and the load file was written 
containing a monitor call to initialize the ECS blocks with the character 
strings represented by the ECSLOAD descriptors. .Figure 15 
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summarizes the structures developed to implement a static character 
string algorithm for XPL 6500. 
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VIII. CONCLUSION 



Although the present need for optimal compiler operation limits 
the production application of bootstrapping and compiler generator 
languages, the future need for special purpose languages in specific 
problem areas should demand their use. 

The histories of the NELLAC and XPL-360/67 compiler systems, 
as well as the simplification of the compiler project for the CDC 6500, 
illustrated the power and effectiveness of bootstrapping techniques. A 
close examination of these compiler generator languages should reveal 
that it is not the powerful instructions, or complex algorithms contained 
within these systems that alone produce their strength. P.ather, the 
efficacy of these new compiler generator languages is created from the 



ability to employ bootstrapping techniques. 
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TABLE I 



IBM 360 AND CDC 6500 CHARACTER SET COMPARISON 



CHARACTER 



PUNCH CODE BYTE CODE 

360 6500 360 6500 



A 


12.1 


Cl 


01 


B 


12-2 


C2 


02 


C 


12-3 


C3 


03 


D 


12_4 


C4 


04 


E 


12_5 


C5 


05 


F 


12_6 


C6 


06 


G 


12_7 


Cl 


07 


H 


12_8 


C8 


10 


I 


12_9 


C9 


1 1 


J 


11_1 


D 1 


12 


K 


11-2 


D2 


13 


L 


11-3 


D3 


14 


M 


11-4 


D4 


15 


N 


11-5 


D5 


16 


O 


11-6 


D6 


17 


p 


1 1 -7 


D7 


20 


Q 


11-8 


D8 


21 


R 


1 1-9 


D9 


22 


S 


0-2 


E2 


23 


T 


0-3 


E3 


24 


U 


0-4 


E4 


25 


V 


0-5 


E5 


26 


W 


0-6 


E6 


27 


X 


0-7 


E7 


30 


Y ' 


0 

1 

00 


E8 


31 


Z 


0-9 


E9 


32 


0 


0 


F0 


33 


1 


1 


FI 


34 


2 


2 


F2 


35 


3 


3 


F3 


36 


4 


4 


F4 


37 


5 


5 


F5 


40 


6 


6 ' 


F6 


41 


7 


7 


F7 


42 


8 


8 


F8 


43 


9 


9 


F9 


44 
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TABLE I 



IBM 360 AND CDC 6500 CHARACTER SET COMPARISON 





PUNCH CODE 


BYTE 


CODE 


CHARACTER 


360 6500 


360 


6500 




11 


60 


46 




11-8-4 


5 C 


47 


l 


0-1 


61 


50 


$ 


11-8-3 


5B 


53 


blank 


space 


40 


55 


t 


0-8-3 


6B 


56 


» 


12-8-3 


4B 


57 




8-2 


1A 


63 


+ 


12-8-6, 12 


HE 


45 


( 


12-8-5, 0-8-4 


4D 


5 1 


) 


11-8-5, 12-8-4 


5 D 


52 


= 


8-6 , 8-3 


7E 


54 


> 


0-8-6 , 11-8-7 


6E 


73 


< 


12-8-4, 12_0 


4C 


72 


-i 


11-8-7, 12-8-6 


5 F 


76 


— 


******, 0-8-6 


'c <]' 


60 


C 


******, 8-7 




61 




******, 0-8-2 




62 


t 


*#*%*#' 8-4 


* # 


64 




* *****, 0-8-5 




6 5 


V 


******, 11-0 




66 


A 


— — — — — — , 0-8-7 


* * 


67 


4 


— -r ) 11-8-5 




70 




***, 11-8-6 


'C ; p 


71 


< 


**** * g_5 




74 




******, 12-8-5 




75 


h 


12 , ****** 


50 


'p 5 p 


% 


0-8-4 , ------ 


6C 


* * 


? 


0-8-7 , ------ 


6 F 


* * 


# 


8-3 , ------ 


7B 


* * 
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TABLE I 



IBM 360 AND CDC 6500 CHARACTER SET COMPARISON 





PUNCH CODE BYTE CODE 


CHARACTER 


360 6500 360 6500 


@ 

I 

1 


g_4 >;:* 7C ❖ * 

g _ 5 * * :|c > 1 ; * sjc 7 

12_8-7, ****** 4F ** 
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TABLE II. DESCRIPTION OF VARIABLE TYPES 



XCOM 1 Code 


Symbol 


Meaning 


0 


UNKNOWN 


the variable type has not been, 
defined 


1 


LABELTYPE 


a branch location 


2 


PARAMETER 


a procedure parameter of un- 
specified type. This label is 
used to prevent storage alloca- 
tion where parameter is 
declared 


3 


FIXEDTYPE 


an integer (60 bit) variable or 
single dimension array 


4 


CHRTYPE 


a string variable or single 
dimension string array which, 
contains a descriptor 


5 


PROC 


the entry point into a procedure 
which does not return a value 


8 


FIXEDPROC 


the entry point into a procedure 
which returns an integer (60 
bit) value 


9 


CIIRPROC 


the entry point into a procedure 
which returns a string descripto 



6 5 



TABLE III. MAJOR XCOM- 1 PROCEDURES 



A. CODE EMISSION ROUTINES 

1. EMIT COMPASS: 

2. EMIT CONSTANT: 

3. EMIT DATA: 

4. EMIT: 

5. FORMAT: 

6. FILE 360: 

7. OPTIONS: 

8. CONVERT CARD: 



produces the three fields needed 
for any COMPASS central proc- 
essor statement from a machine 
language statement. 

maintains a table of previously 
emitted constants and produces 
new DATA locations for new 
constants . 

issues an assembler statement to 
the DATA area. 

issues an assembler statement to 
the CODE area. 

builds a single COMPASS state- 
ment from three assembler fields. 

provides necessary DATA and 
CODE file maintenance. 

controls the punching and listing 
of converted BCD COMPASS 
assembler statements. 

provides EBCDIC to BCD 
conversion 



B. CODE GENERATION ROUTINES 

1. SYNTHESIZE: produces and controls the produc- 

tion of a machine language -like 
statement for the code emission 
r outines . 

2. STRING ADDITION: produces code for all implicitly 

declared string operations and 
functions . 
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3. MAKE STRING: 


builds a call to CONVERT TO 
STRING which provides numeric 
to string conversion. 


4. LOGIC OPS: 


builds code for AND, OR logical 
operations . 


5. FLOAT OPS: 


builds code for division and mult- 
plication operations through central 
processor floating point operations. 


6. FIXED OPS: 


builds code for addition and sub- 
traction operations using fixed 
point operations. 


7. ASSIGN: 


builds code for variable and variable 
list assignments. 


8 . SET PARA ME T ER : 


builds various calls to library 
procedures . 



C. SYMBOL TABLE ROUTINES 



1. ENTER 3: 


controls the declarations of any 
identifier or string. 


2. CUTBACK: 


resets symbol table parameters to 
remove local variables. 


3. ENTER 1: 


builds an initial three part symbol 
table entry. 


4. S YTSEARCH: 


returns the symbol table location 
of a give'n identifier. 



D. INITIALIZATION ROUTINES 



1. INITIALIZATION: 


sets all compiler variables 
necessary to initiate scanning and 
code emission. 


2. INITIALIZE 2 : 


resets compiler variables after 
library procedures have been 
c ompiled . 
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3. EMIT BUILT IN CODE: 



emits code for initial COMPASS 
assembler interaction and pro- 
cedures SHL, SHR, GETWORD, 
and PUTWORD. 
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TABLE IV. MONITOR CALL SUMMARY 



Code 



0 

1 

2 

3 

4 

5 

6 
n 

I 



Action 

USER REQUESTED ABEND 
GET SEQUENTIAL INPUT 
PUT SEQUENTIAL OUTPUT 
READ RANDOM FILE 

WRITE RANDOM FILE 
READ FROM ECS 
WRITE INTO ECS 
INITIALIZE ECS 



Monitor Call Parameters 

( 0 ) 

(1, FWA) 

(2, FWA, FILE) 

(3, FWA, FILE, RECORD, FILE 
SIZE, INDEX SIZE) 

(4, -FWA, FILE, RECORD) 

(5, FWA, ECS, FWA) 

(6, FWA, ECS, FWA) 

(7, FWA, NUMBER OF 
DESCRIPTIONS) 
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APPENDIX B. MONITOR FLOW DIAGRAMS 



Figure MONITOR Code Function 



B1 1 

B2 2 

B3 3 

B4 4 



Sequential Input 

Sequential Output 

Read or Create a Random 
Access File 

Write to a Random Access 

File 



B5 

B5 



5 Read from Extended Core 
Storage 

6 Write to Extended Core 
Storage 



B6 



7 



Initialize Extended Core 
String Area 
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GETSEQ 





Figure Bl : Monitor action for Sequential Input 0 
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Figure B2 ; 

Monitor Action for 
Sequential Output 
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HEADF 




^DOKE^J 



Figure B3i Monitor Action for Random File 
Reading and Creation* 
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WBITEF 




Figure B 4: Monitor Action for Random File 

Write * 
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READ >> 
ERRORS \ 
FOUND / 
? 



F 

WRITE \ 
ERRORS f 
FOUND J 

7 -""C 

YES 




. -nT“>-.-n 

666 J 




ZERO OUT 
( 26 WORDS 
V BUFFER 





Figure B5? Monitor Action for Extended 
Core Storage Read or Write* 
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DECLARE ( RESERVED_LIMIT, MARG I N_CHQP ) FIXED; 
DECLARE (CHARTYPE, TX) (255) BIT(B), 
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IF OCT AI__CODE = 1 THEN CODE = 1+2 ; ELSE CODE = 1 + 6 

END ; 

MNEO = CP MAP 2 ( CODE ) ; 

INST_FREQTCODt ) = I NST_FREQ( CODE ) + 1 ; 

C P_CODE = SUBSTR(CP_C0DES,MNE0,2) ; 
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EMI INCONSTANT : 

PROCEDURE! J ) FIXED *, 

DECLARE! J, I , L) FIXED *, 

/* J IS A CONSTANT 1 RETURN A LOCATION CONTAINING IT */ 
/* CHECK TO SEE IF CONST IS ALREADY EMITTED */ 
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PROC EDURE ( ID ) F IXED 
DECLARE ID CHARACTER 
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XV(PTR) = PROTECT ( PTR ) ; /* PROTECT DESCRIPTOR */ 

D MAKE STRING ; 
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D A YS ( 12 ) FIXEO INITIAL (0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 

305, 335, 366); 

YEAR = D/ 1000 + 1900; 

DAY = D MOD 1000; 

IF (YEAR S ,, 3") 0 THEN IF DAY > 59 THEN DAY = DAY + 1; /* - LEAP YEAR* / 
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CALL TO COMPARE STRINGS 
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ELSE REST = « • ; 

TEXT = buffer; 

TEXT LIMIT = L ENGTH ( TEXT ) - 1; 

IF CONTROL! BYTE( »M* ) ) THEN OUTPUT = BUFFER 
ELSE IF CONTROL (BYTE! 'L' ) ) THEN 
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INITIALIZE COMPILER VARIABLES */ 
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PROCEDURE ; 

DECLARE ( LPM , I , J ,K , L , M , PROCMARK ) FIXED 
DECLARE(BUFFER,BL) CHARACTER ; 
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LCNT = LC NT + 1 ; 

CALL EMIT_DATA(LCNTtVFDtVFD_START || ECSLOAD ( 0 ) » 0 ) 
DO I = 1 TO RE CNT ; 
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FIXV(MPPl) ; 

EMIT_COMPASS(0,51,7,0,0, I ) ; /* STORE IN STEP VARIABLE */ 
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<GRQUP> ::= <FOR HEADXEND ING> 
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all procedures are constructed in the following manner 
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‘•docn NO I1V1 I dWOO nvo 



/* CLOCK ( 3 ) GETS SET IN PRINT SUMMARY */ 
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